Shareware Grab Bag/Shareware Grab Bag.iso/003/db3plsar.arc/EDIT.FMT

Text File | 1985-10-16 | 884 b | 34 lines

******************************* (B:EDIT.FMT)
@ 1,1 SAY ì
'-----------------------------------------------------------------ì
---------'
@ 2,1 SAY 'Account number'
@ 2,17 SAY ACCT
@ 2,28 SAY 'Invoice number'
@ 2,43 GET INVNO
@ 2,57 SAY 'P.O.#'
@ 2,63 GET PONO
@ 4,1 SAY 'Date shipped'
@ 4,14 GET NEWDATE
@ 4,32 SAY 'Paid ? '
@ 4,40 GET PAID
@ 4,54 SAY 'Date paid'
@ 4,65 GET PAYDATE
@ 6,1 SAY ì
'-----------------------------------------------------------------ì
---------'
@ 8,25 SAY 'Price        '
@ 8,39 GET PRICE
@ 9,25 SAY 'Credits      '
@ 9,39 GET CRINV
@ 10,25 SAY 'Payments    '
@ 10,39 GET AMTAPPL
@ 11,39 SAY '---------'
@ 12,25 SAY 'Net Due     '
@ 12,39 GET NET
@ 15,1 SAY 'Press Ctrl W when finished    *    Use arrows and Pg Up/Pg ì
Dn keys to scan'
@ 16,1 SAY ì
'-----------------------------------------------------------------ì
---------'